object MantenimientoPresupuestos: TMantenimientoPresupuestos
  Left = 0
  Top = 0
  Caption = 'MantenimientoPresupuestos'
  ClientHeight = 473
  ClientWidth = 773
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Paginas: TPageControl
    Left = 0
    Top = 0
    Width = 773
    Height = 473
    ActivePage = Mantenimiento
    Align = alClient
    TabOrder = 0
    object Consulta: TTabSheet
      Caption = 'Consulta'
      TabVisible = False
      object pnlTitulo: TPanel
        Left = 0
        Top = 0
        Width = 765
        Height = 25
        Align = alTop
        Color = clSkyBlue
        ParentBackground = False
        TabOrder = 0
        object lblConsulta: TLabel
          Left = 1
          Top = 1
          Width = 763
          Height = 23
          Align = alClient
          Alignment = taCenter
          Caption = 'CONSULTA DE PRESUPUESTOS'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clNavy
          Font.Height = -20
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          ParentFont = False
          ExplicitWidth = 274
        end
      end
      object pnlFiltros: TPanel
        Left = 0
        Top = 25
        Width = 765
        Height = 128
        Align = alTop
        TabOrder = 1
        object lblServicio: TLabel
          Left = 9
          Top = 99
          Width = 45
          Height = 16
          Caption = 'Servicio:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
        end
        object lblDesde: TLabel
          Left = 488
          Top = 27
          Width = 37
          Height = 16
          Caption = 'Desde:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
        end
        object lblHasta: TLabel
          Left = 488
          Top = 53
          Width = 35
          Height = 16
          Caption = 'Hasta:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
        end
        object lblCategoria: TLabel
          Left = 9
          Top = 70
          Width = 58
          Height = 16
          Caption = 'Categor'#237'a:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
        end
        object lblProveedor: TLabel
          Left = 9
          Top = 9
          Width = 60
          Height = 16
          Caption = 'Proveedor:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
        end
        object Label1: TLabel
          Left = 9
          Top = 39
          Width = 61
          Height = 16
          Caption = 'Campa'#241'a:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
        end
        object cbxFecha: TCheckBox
          Left = 488
          Top = 5
          Width = 111
          Height = 17
          Caption = 'Fecha de Carga:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
          TabOrder = 12
          OnClick = cbxFechaClick
        end
        object rgEstadoReg: TRadioGroup
          Left = 648
          Top = 5
          Width = 105
          Height = 69
          Caption = 'Estado Registro'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          Items.Strings = (
            'Activo'
            'Inactivo'
            'Ambos')
          ParentFont = False
          TabOrder = 15
        end
        object dbCodigoServicio: TEdit
          Left = 72
          Top = 96
          Width = 80
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
          TabOrder = 9
          OnExit = dbCodigoServicioExit
          OnKeyPress = dbCodigoServicioKeyPress
        end
        object dbDescServicio: TEdit
          Left = 176
          Top = 96
          Width = 303
          Height = 24
          TabStop = False
          CharCase = ecUpperCase
          Color = clInfoBk
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          TabOrder = 11
        end
        object dbDesdeC: TDateTimePicker
          Left = 528
          Top = 22
          Width = 111
          Height = 24
          Date = 41800.955102071760000000
          Time = 41800.955102071760000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
          TabOrder = 13
        end
        object dbHastaC: TDateTimePicker
          Left = 528
          Top = 49
          Width = 111
          Height = 24
          Date = 41800.955102071760000000
          Time = 41800.955102071760000000
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
          TabOrder = 14
        end
        object btnBuscarServicio: TBitBtn
          Left = 152
          Top = 95
          Width = 24
          Height = 25
          Caption = '...'
          TabOrder = 10
          OnClick = btnBuscarServicioClick
        end
        object dbCodigoCategoria: TEdit
          Left = 72
          Top = 66
          Width = 80
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
          TabOrder = 6
          OnExit = dbCodigoCategoriaExit
          OnKeyPress = dbCodigoCategoriaKeyPress
        end
        object btnBuscarCategoria: TBitBtn
          Left = 152
          Top = 65
          Width = 24
          Height = 25
          Caption = '...'
          TabOrder = 7
          OnClick = btnBuscarCategoriaClick
        end
        object dbDescCategoria: TEdit
          Left = 176
          Top = 66
          Width = 303
          Height = 24
          TabStop = False
          CharCase = ecUpperCase
          Color = clInfoBk
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          TabOrder = 8
        end
        object dbCodigoP: TEdit
          Left = 72
          Top = 6
          Width = 80
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          OnExit = dbCodigoPExit
          OnKeyPress = dbCodigoPKeyPress
        end
        object btnBuscadorP: TBitBtn
          Left = 152
          Top = 5
          Width = 24
          Height = 25
          Caption = '...'
          TabOrder = 1
          OnClick = btnBuscadorPClick
        end
        object dbNombreP: TEdit
          Left = 176
          Top = 6
          Width = 303
          Height = 24
          TabStop = False
          CharCase = ecUpperCase
          Color = clInfoBk
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          TabOrder = 2
        end
        object dbCodigoCampanha: TEdit
          Left = 72
          Top = 36
          Width = 80
          Height = 24
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
          OnExit = dbCodigoCampanhaExit
          OnKeyPress = dbCodigoCampanhaKeyPress
        end
        object btnBuscarCampanha: TBitBtn
          Left = 152
          Top = 35
          Width = 24
          Height = 25
          Caption = '...'
          TabOrder = 4
          OnClick = btnBuscarCampanhaClick
        end
        object dbDescCampanha: TEdit
          Left = 176
          Top = 36
          Width = 303
          Height = 24
          TabStop = False
          CharCase = ecUpperCase
          Color = clInfoBk
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
          ReadOnly = True
          TabOrder = 5
        end
        object dbIdProveedor: TEdit
          Left = 485
          Top = 6
          Width = 41
          Height = 21
          TabStop = False
          TabOrder = 16
          Visible = False
        end
      end
      object pnlBotones: TPanel
        Left = 600
        Top = 153
        Width = 165
        Height = 310
        Align = alRight
        TabOrder = 2
        object btnBuscar: TBitBtn
          Left = 32
          Top = 24
          Width = 105
          Height = 33
          Caption = '&Buscar'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Glyph.Data = {
            76060000424D7606000000000000360400002800000018000000180000000100
            08000000000040020000320B0000320B000000010000000100005A5A5A005263
            6B00846B6B009C6B6B00636B7300A5737300A57B73007B7B7B00AD847B00AD8C
            8400B58C8400EFBD8400BD8C8C00C6948C00BD9C8C00C69C8C00F7BD8C00F7C6
            8C00738494007B84940084849400C6949400C69C9400CE9C9400D69C9400BDA5
            9400CEA59400CEAD9400F7C69400F7CE94009C9C9C00BD9C9C00CE9C9C00D69C
            9C00CEA59C00F7CE9C00F7D69C003973A500C6A5A500ADADA500D6ADA500D6B5
            A500D6BDA500F7D6A500C6ADAD00D6B5AD00D6C6AD00DEC6AD00E7C6AD00E7CE
            AD00F7D6AD00F7DEAD00FFDEAD001873B5002173B5006394B500E7CEB500EFD6
            B500EFDEB500F7DEB500FFE7B5001873BD00E7D6BD00F7DEBD00F7E7BD00FFE7
            BD00FFEFBD00FFF7BD00EFDEC600EFE7C600FFEFC600FFF7C600FFF7CE003184
            D600FFFFD600C6CEDE00F7EFDE00FFEFDE00FFFFDE00EFEFE700FFF7E700FFFF
            E700218CEF00F7F7EF00FFFFEF00FFFFF700FF00FF0031A5FF0039A5FF0042A5
            FF004AB5FF0052BDFF005ABDFF007BC6FF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00560004165656
            5656565656565656565656565656565656562725361217565656565656565656
            5656565656565656565637585236131756565656565656565656565656565656
            56565A5C59523613175656565656565656565656565656565656575B5C595236
            13175656565656565656565656565656565656575B5C59523614175656565656
            565656565656565656565656575B5C5952361417565656565656565656565656
            5656565656575B5C59523614565656565656565656565656565656565656575B
            5C5849015656030A222928201556565656565656565656575B5D4B1E02093E48
            4A4E4A4A44225656565656565656565656564F2C1A484A4E4A4A4A4E4E4E2905
            565656565656565656562C1A4241484A4A4A4E4E515E5E265656565656565656
            56560C3A3C32484A4A4E5154555E5E4C065656565656565656562942232B484A
            4A4E54555E55544E1956565656565656561531421123464A4A4E545555544E4E
            2E155656565656565615393C0B113B4A4A4E515454514E4E3E0E565656565656
            56153942100B23464A4E4E4E4E4E4A4E3E0E56565656565656153142230B1C2B
            464A4E4A4A4A4A4E2E1556565656565656562842413323232B40484A4A4A4A4A
            0E5656565656565656560C3A4E544C231D1C324040464A440556565656565656
            5656560F505E5E3F1C0B101C3242460E5656565656565656565656561F4F5448
            3C33333C4240165656565656565656565656565656062A404242424030155656
            565656565656565656565656565656080F222216565656565656}
          ParentFont = False
          TabOrder = 0
          OnClick = btnBuscarClick
        end
        object btnNuevo: TBitBtn
          Left = 32
          Top = 63
          Width = 105
          Height = 33
          Caption = '&Nuevo'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Glyph.Data = {
            76060000424D7606000000000000360400002800000018000000180000000100
            08000000000040020000230B0000230B000000010000000100002184290031A5
            4A0031AD520039B5520063A563006BAD840094DE8C00A5E79C00FF00FF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00080808080808
            0808080808080808080808080808080808080808080808080808080808080808
            0808080808080808080808080808080808080808000000000808080808080808
            0808080808080808080808040506030100080808080808080808080808080808
            0808080407060302000808080808080808080808080808080808080407060302
            0008080808080808080808080808080808080804070603020008080808080808
            0808080808080808080808040706030200080808080808080808080808080808
            0808080407060302000808080808080808080808080000000000000007060302
            0000000000000000080808080401020202020202020203020202020202020201
            0008080804030303030303030303030303030303030303030008080804060606
            0606060606060303060606060606060600080808040507070707070707060302
            0707070707070705000808080804040404040404070603020000000000000000
            0808080808080808080808040706030200080808080808080808080808080808
            0808080407060302000808080808080808080808080808080808080407060302
            0008080808080808080808080808080808080804070603020008080808080808
            0808080808080808080808040706030200080808080808080808080808080808
            0808080407060302000808080808080808080808080808080808080405060301
            0008080808080808080808080808080808080808040404040808080808080808
            0808080808080808080808080808080808080808080808080808}
          ParentFont = False
          TabOrder = 1
          OnClick = btnNuevoClick
        end
        object btnModificar: TBitBtn
          Left = 32
          Top = 102
          Width = 105
          Height = 33
          Caption = '&Modificar'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Glyph.Data = {
            E2030000424DE203000000000000A20100002800000018000000180000000100
            08000000000040020000520B0000520B00005B0000005B000000191919002125
            27000B3B54003E39350037454600384850003A5C600062555D00C75C0C007041
            38006B5D6200745D650098605800986060007E694C00986A5800A16A58008C79
            6000EA8F3800FFA13800E0985000F69E4B00F4AB500000008200010A9700000F
            9500165E820003478900000BB6000320BA000616CA000650FF0098586A009860
            6A00A1606A00FF00FF001684EA002A73D4005270FC0031ABFF0084848400A16A
            6A00A66B6B00AB6A6A00AB6A7300AC9D8A00B6737300C07B7300CA847B00B292
            6800D48F7300D48F7B00E0A16A00C0988F00EAB67300F7AF6C00EAC07B00EAC0
            8400FABB7D00D4B6AB00EAC08F00F4CA8F00F4CA9800FAC69300E0C0AB00EACA
            AB00F4CAA100F4D4A100F4D4AB00D4D4D400E0C0B600EAC0B600EAD4B600E0CA
            C000E0D4C000F4D4B600F4D4C000E0CACA00EAD4CA00F4E0B600F4E0C000F4E0
            CA00F4E0D400F4EAD400F4EAE000F4EAEA00FFF4EA00FFF4F400FFFFF400FFFF
            FF00000000002323230D29292929292929292929292929292929292923232323
            2320484F4443423E3D3939383838383838383829232323232320484F4B44423E
            3E3C393938383838383838292323232323204C504B4B44423E3E3C3939383838
            383838292323232323205051504B4444423E3E3C393938383838382923232323
            232051452828282800031131282828282828382923232323232152535150504B
            030104050E313939383838292323232323225454535150502D062502090E3139
            3938382923232323232954452828282828061A0B08090E312828382923232323
            232B555654545351505007371508090E3139382923232323232C575856545453
            51500A3A371508090E31392923232323232E5745282828282828280C3F371508
            090E312923232323232E575959575654545351500C3F371508090E2923232323
            232E57595959575654545351500C3F371508092923232323232F574528282828
            2828282828280C3A2A24271B23232323232F575959595959575654545351500C
            24272419172323232330575959595959595756545353534A27241D1E181C2323
            233057452828282828282828284E100F0C1C261F1C2323232333575959595959
            595958575646103414121C1C2323232323335759595959595959595958461036
            1613292323232323233357595959595959595959594910361629232323232323
            233359595959595959595959594D103629232323232323232332404141474040
            40403B3B3B351029232323232323232323232323232323232323232323232323
            232323232323}
          ParentFont = False
          TabOrder = 2
          OnClick = btnModificarClick
        end
        object btnEliminar: TBitBtn
          Left = 32
          Top = 141
          Width = 105
          Height = 33
          Caption = '&Eliminar'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Glyph.Data = {
            76060000424D7606000000000000360400002800000018000000180000000100
            08000000000040020000220B0000220B000000010000000100000031DE00FF00
            FF000031FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00010101010101
            0101010101010101010101010101010101010101010101010101010101010101
            0101010101010100000101010101010101010101010101010101010101010000
            0001010100000001010101010101010101010101010000000101010100000000
            0101010101010101010101000000000101010101000000000001010101010101
            0101000000000101010101010100000000000101010101010100000000010101
            0101010101010200000000010101010100000000010101010101010101010101
            0000000001010000000000010101010101010101010101010100000000000000
            0000010101010101010101010101010101010000020002000001010101010101
            0101010101010101010101000000020001010101010101010101010101010101
            0101000002000002020101010101010101010101010101010100000200020202
            0002010101010101010101010101010102020200020101020202020101010101
            0101010101010102020002020101010102020202010101010101010101010202
            0202020101010101010102020201010101010101010202020202010101010101
            0101010202020101010101010202020202010101010101010101010101020101
            0101010202020202010101010101010101010101010101010101010202020201
            0101010101010101010101010101010101010102020201010101010101010101
            0101010101010101010101010101010101010101010101010101010101010101
            0101010101010101010101010101010101010101010101010101}
          ParentFont = False
          TabOrder = 3
          OnClick = btnEliminarClick
        end
        object btnCerrar: TBitBtn
          Left = 32
          Top = 180
          Width = 105
          Height = 33
          Caption = '&Cerrar'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Glyph.Data = {
            F6060000424DF606000000000000360000002800000018000000180000000100
            180000000000C0060000120B0000120B00000000000000000000FF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF824B4B4E1E
            1FFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF824B4B824B4B
            8C4B4B914B4B4E1E1FFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF824B4B824B4B89
            4B4B9C4B4CB64B4CBD4B4C9F4B4C4E1E1FFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF824B4B824B
            4B9A4D4EAF4E4FC14E4FC04D4EBF4C4DBF4C4D9F4B4C4E1E1F994B4B824B4B82
            4B4B824B4B824B4B824B4B824B4B824B4B824B4BFF00FFFF00FFFF00FFFF00FF
            FF00FF824B4BC55455C95455C75354C65253C55152C45051C24F50A04C4D4E1E
            1FFE8B8CFC9293FB9A9CFAA3A4F8AAABF7B1B1F7B5B6F7B5B6824B4BFF00FFFF
            00FFFF00FFFF00FFFF00FF824B4BCE5859CC5758CB5657CA5556C95455C75354
            C65253A34E4F4E1E1F3F9E4C1EBC4C1EBC4C1EBC4C1EBC4C1EBC4C1EBC4CF7B5
            B6824B4BFF00FFFF00FFFF00FFFF00FFFF00FF824B4BD15B5CD05A5BCF595ACE
            5859CC5758CB5657CA5556A550504E1E1F3F9E4C1EBC4C1EBC4C1EBC4C1EBC4C
            1EBC4C1EBC4CF7B5B6824B4BFF00FFFF00FFFF00FFFF00FFFF00FF824B4BD55E
            5FD55E5FD45D5ED35C5DD15B5CD05A5BCF595AA651524E1E1F3F9E4C1EBC4C1E
            BC4C1EBC4C1EBC4C1EBC4C1EBC4CF7B5B6824B4BFF00FFFF00FFFF00FFFF00FF
            FF00FF824B4BDA6364D96263D86062D75F60D55E5FD45D5ED35C5DA953544E1E
            1F3F9E4C1EBC4C1EBC4C1EBC4C1EBC4C1EBC4C1EBC4CF7B5B6824B4BFF00FFFF
            00FFFF00FFFF00FFFF00FF824B4BDE6667DD6566DC6465DA6364D96263D86062
            D75F60AB55554E1E1F3F9E4C1EBC4C1EBC4C1EBC4C1EBC4C1EBC4C1EBC4CF7B5
            B6824B4BFF00FFFF00FFFF00FFFF00FFFF00FF824B4BE2696AE16869E06768DE
            6667E06D6EE69091DC6465AC56574E1E1F58A55B1EBC4C1EBC4C1EBC4C1EBC4C
            1EBC4C1EBC4CF7B5B6824B4BFF00FFFF00FFFF00FFFF00FFFF00FF824B4BE76D
            6EE66C6DE56B6CE36A6BEEA6A7FFFFFFEB9C9CAF58594E1E1FEECEAFB7EBAA5E
            D3775ED37745CA6745CA6745CA67F7B5B6824B4BFF00FFFF00FFFF00FFFF00FF
            FF00FF824B4BEB7072EA6F70E96E6FE76D6EF2A9AAFFFFFFEB9596B15A5A4E1E
            1FEECEAFFFFFD3FFFFD3FFFFD3FFFFD3D9F6BDD9F6BDF7B5B6824B4BFF00FFFF
            00FFFF00FFFF00FFFF00FF824B4BEF7475EE7374ED7273EB7072EA6F70EF9091
            E76D6EB25B5C4E1E1FEECEAFFFFFD3FFFFD3FFFFD3FFFFD3FFFFD3FFFFD3F7B5
            B6824B4BFF00FFFF00FFFF00FFFF00FFFF00FF824B4BF37778F37778F27677F0
            7576EF7475EE7374ED7273B55D5D4E1E1FEECEAFFFFFD3FFFFD3FFFFD3FFFFD3
            FFFFD3FFFFD3F7B5B6824B4BFF00FFFF00FFFF00FFFF00FFFF00FF824B4BF87B
            7DF77A7BF6797AF47879F37778F27677F07576B75F5F4E1E1FEECEAFFFFFD3FF
            FFD3FFFFD3FFFFD3FFFFD3FFFFD3F7B5B6824B4BFF00FFFF00FFFF00FFFF00FF
            FF00FF824B4BFC7F80FB7E7FFA7D7EF87B7DF77A7BF6797AF47879B860624E1E
            1FEECEAFFFFFD3FFFFD3FFFFD3FFFFD3FFFFD3FFFFD3F7B5B6824B4BFF00FFFF
            00FFFF00FFFF00FFFF00FF824B4BFF8182FF8182FE8081FC7F80FC7F80FB7E7F
            FA7D7EBB63634E1E1FEECEAFFFFFD3FFFFD3FFFFD3FFFFD3FFFFD3FFFFD3F7B5
            B6824B4BFF00FFFF00FFFF00FFFF00FFFF00FF824B4BFF8182FF8182FF8182FF
            8182FF8182FE8081FE8081BD65654E1E1FEECEAFFFFFD3FFFFD3FFFFD3FFFFD3
            FFFFD3FFFFD3F7B5B6824B4BFF00FFFF00FFFF00FFFF00FFFF00FF824B4BF77E
            7FFF8182FF8182FF8182FF8182FF8182FF8182BF66664E1E1FEECEAFFFFFD3FF
            FFD3FFFFD3FFFFD3FFFFD3FFFFD3F7B5B6824B4BFF00FFFF00FFFF00FFFF00FF
            FF00FF824B4B824B4BAF5E5FD56F70FF8182FF8182FF8182FF8182BF66664E1E
            1FEECEAFFFFFD3FFFFD3FFFFD3FFFFD3FFFFD3FFFFD3F7B5B6824B4BFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FF824B4B824B4B915152B66263EE7A7B
            FF8182BF66664E1E1F914B4B824B4B824B4B824B4B824B4B824B4B824B4B824B
            4B824B4BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FF824B4B824B4B9855559F58584E1E1FFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF824B4B4E1E1FFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
          ParentFont = False
          TabOrder = 4
          OnClick = btnCerrarClick
        end
      end
      object dbgConsultaPresupuestos: TDBGrid
        Left = 0
        Top = 153
        Width = 600
        Height = 310
        Align = alClient
        DataSource = dsPresupuestos
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
        TabOrder = 3
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'Tahoma'
        TitleFont.Style = []
        OnDrawColumnCell = dbgConsultaPresupuestosDrawColumnCell
        OnDblClick = btnModificarClick
        Columns = <
          item
            Expanded = False
            FieldName = 'NOMBRE_CAMPANHA'
            Title.Caption = 'CAMPANHA'
            Title.Font.Charset = DEFAULT_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -11
            Title.Font.Name = 'Tahoma'
            Title.Font.Style = [fsBold]
            Width = 150
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'DESC_PROVEEDOR'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            Title.Caption = 'PROVEEDOR'
            Title.Font.Charset = DEFAULT_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -11
            Title.Font.Name = 'Tahoma'
            Title.Font.Style = [fsBold]
            Width = 200
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'NOMBRE_CATEGORIA'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            Title.Caption = 'CATEGORIA'
            Title.Font.Charset = DEFAULT_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -11
            Title.Font.Name = 'Tahoma'
            Title.Font.Style = [fsBold]
            Width = 180
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'DESC_SERVICIO'
            Title.Caption = 'SERVICIO'
            Title.Font.Charset = DEFAULT_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -11
            Title.Font.Name = 'Tahoma'
            Title.Font.Style = [fsBold]
            Width = 250
            Visible = True
          end>
      end
    end
    object Mantenimiento: TTabSheet
      Caption = 'Mantenimiento'
      ImageIndex = 1
      TabVisible = False
      object pnlTitulo2: TPanel
        Left = 0
        Top = 0
        Width = 765
        Height = 25
        Align = alTop
        Color = clSkyBlue
        ParentBackground = False
        TabOrder = 0
        object lblTitulo2: TLabel
          Left = 1
          Top = 1
          Width = 763
          Height = 23
          Align = alClient
          Alignment = taCenter
          Caption = 'MANTENIMIENTO DE PRESUPUESTOS'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clNavy
          Font.Height = -20
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          ParentFont = False
          ExplicitWidth = 332
        end
      end
      object pnlDatos: TPanel
        Left = 0
        Top = 25
        Width = 765
        Height = 438
        Align = alClient
        TabOrder = 1
        object rgDatos: TGroupBox
          Left = 11
          Top = 5
          Width = 739
          Height = 390
          Caption = ' DATOS DEL PRESUPUESTO (*Campos Obligatorios )'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Century Gothic'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          object lblEmision: TLabel
            Left = 14
            Top = 154
            Width = 102
            Height = 16
            Caption = 'Fecha de Emision:*'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
          end
          object lblVencimiento: TLabel
            Left = 14
            Top = 187
            Width = 76
            Height = 16
            Caption = 'Vencimiento:*'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
          end
          object lblProveedorPresu: TLabel
            Left = 14
            Top = 33
            Width = 66
            Height = 16
            Caption = 'Proveedor:*'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
          end
          object lblCampanhaPresu: TLabel
            Left = 14
            Top = 63
            Width = 67
            Height = 16
            Caption = 'Campa'#241'a:*'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
          end
          object lblCategoriaPresu: TLabel
            Left = 14
            Top = 94
            Width = 64
            Height = 16
            Caption = 'Categor'#237'a:*'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
          end
          object lblServicioPresu: TLabel
            Left = 14
            Top = 123
            Width = 51
            Height = 16
            Caption = 'Servicio:*'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
          end
          object lblCiudad: TLabel
            Left = 270
            Top = 154
            Width = 51
            Height = 16
            Caption = 'Ciudad:*'
          end
          object dbFecEmision: TDateTimePicker
            Left = 122
            Top = 151
            Width = 111
            Height = 24
            Date = 41800.955102071760000000
            Time = 41800.955102071760000000
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
            TabOrder = 12
          end
          object dbFecVencimiento: TDateTimePicker
            Left = 122
            Top = 184
            Width = 111
            Height = 24
            Date = 41800.955102071760000000
            Time = 41800.955102071760000000
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
            TabOrder = 13
          end
          object dbCodigoProveedor2: TEdit
            Left = 485
            Top = 30
            Width = 80
            Height = 24
            TabStop = False
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
            TabOrder = 2
            Visible = False
            OnExit = dbCodigoProveedor2Exit
          end
          object btnBuscarProveedor2: TBitBtn
            Left = 460
            Top = 29
            Width = 24
            Height = 25
            Caption = '...'
            TabOrder = 1
            OnClick = btnBuscarProveedor2Click
          end
          object dbDescProveedor2: TEdit
            Left = 84
            Top = 30
            Width = 376
            Height = 24
            TabStop = False
            CharCase = ecUpperCase
            Color = clInfoBk
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
            ReadOnly = True
            TabOrder = 0
          end
          object dbCodigoServicio2: TEdit
            Left = 485
            Top = 120
            Width = 80
            Height = 24
            TabStop = False
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
            TabOrder = 11
            Visible = False
            OnExit = dbCodigoServicio2Exit
          end
          object dbCodigoCategoria2: TEdit
            Left = 485
            Top = 90
            Width = 80
            Height = 24
            TabStop = False
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
            TabOrder = 8
            Visible = False
            OnExit = dbCodigoCategoria2Exit
          end
          object dbCodigoCampanha2: TEdit
            Left = 485
            Top = 60
            Width = 80
            Height = 24
            TabStop = False
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
            TabOrder = 5
            Visible = False
            OnExit = dbCodigoCampanha2Exit
          end
          object btnBuscarCampanha2: TBitBtn
            Left = 460
            Top = 59
            Width = 24
            Height = 25
            Caption = '...'
            TabOrder = 4
            OnClick = btnBuscarCampanha2Click
          end
          object btnBuscarCategoria2: TBitBtn
            Left = 460
            Top = 89
            Width = 24
            Height = 25
            Caption = '...'
            TabOrder = 7
            OnClick = btnBuscarCategoria2Click
          end
          object btnBuscarServicio2: TBitBtn
            Left = 460
            Top = 119
            Width = 24
            Height = 25
            Caption = '...'
            TabOrder = 10
            OnClick = btnBuscarServicio2Click
          end
          object dbDescServicio2: TEdit
            Left = 84
            Top = 120
            Width = 376
            Height = 24
            TabStop = False
            CharCase = ecUpperCase
            Color = clInfoBk
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
            ReadOnly = True
            TabOrder = 9
          end
          object dbDescCategoria2: TEdit
            Left = 84
            Top = 90
            Width = 376
            Height = 24
            TabStop = False
            CharCase = ecUpperCase
            Color = clInfoBk
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
            ReadOnly = True
            TabOrder = 6
          end
          object dbDescCampanha2: TEdit
            Left = 84
            Top = 60
            Width = 376
            Height = 24
            TabStop = False
            CharCase = ecUpperCase
            Color = clInfoBk
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'Century Gothic'
            Font.Style = []
            ParentFont = False
            ReadOnly = True
            TabOrder = 3
          end
          object dbIdProveedor2: TEdit
            Left = 571
            Top = 30
            Width = 41
            Height = 24
            TabStop = False
            TabOrder = 17
            Visible = False
            OnExit = dbIdProveedor2Exit
          end
          object gbxMonto: TGroupBox
            Left = 14
            Top = 294
            Width = 612
            Height = 88
            Caption = 'Costo'
            TabOrder = 16
            object lblMonto: TLabel
              Left = 31
              Top = 42
              Width = 40
              Height = 16
              Caption = 'Costo:*'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -11
              Font.Name = 'Century Gothic'
              Font.Style = []
              ParentFont = False
            end
            object dbMonto: TDBEdit
              Left = 77
              Top = 39
              Width = 127
              Height = 24
              CharCase = ecUpperCase
              DataField = 'COSTO'
              DataSource = dsPresupuestos
              MaxLength = 100
              TabOrder = 0
              OnKeyPress = dbMontoKeyPress
            end
            object rgIVA: TDBRadioGroup
              Left = 354
              Top = 29
              Width = 226
              Height = 38
              Columns = 2
              DataField = 'IVA'
              DataSource = dsPresupuestos
              Items.Strings = (
                'Incluye IVA'
                'No incluye IVA')
              ParentBackground = True
              TabOrder = 2
              Values.Strings = (
                '0'
                '1')
            end
            object rgCosto: TDBRadioGroup
              Left = 221
              Top = 19
              Width = 115
              Height = 61
              DataField = 'MODO'
              DataSource = dsPresupuestos
              Items.Strings = (
                'Por persona'
                'Total')
              ParentBackground = True
              TabOrder = 1
              Values.Strings = (
                'P'
                'T')
            end
          end
          object cbxCiudadLaboral: TDBComboBox
            Left = 328
            Top = 151
            Width = 298
            Height = 24
            Style = csDropDownList
            CharCase = ecUpperCase
            DataField = 'CIUDAD'
            DataSource = dsPresupuestos
            Items.Strings = (
              'ALBERDI'
              'ALTOS'
              'ALTO VER'#193
              'ABA'#8217'I'
              'ACAHAY'
              'ANTEQUERA'
              'AREGU'#193
              'ARROYOS Y ESTEROS'
              'ARQUITECTO TOM'#193'S ROMERO PEREIRA'
              'ASUNCI'#211'N'
              'ATYR'#193
              'BAH'#205'A NEGRA'
              'BENJAM'#205'N ACEVAL'
              'BEL'#201'N'
              'BELLA VISTA'
              'BORJA'
              'BRIGADIER FULGENCIO YEGROS'
              'BUENA VISTA'
              'CAACUP'#201
              'CAAGUAZ'#218
              'CAAPUC'#218
              'CAAZAP'#193
              'CAMBYRET'#193
              'CAPIAT'#193
              'CAPIT'#193'N EMETERIO MIRANDA'
              'CAPIT'#193'N JOS'#201' IGNACIO MEZA'
              'CAPIT'#193'N MAURICIO JOS'#201' TROCHE'
              'CAPIT'#193'N MAT'#205'AS BADO'
              'CAPIT'#193'N PEDRO JUAN CABALLERO'
              'CAPIIBARY'
              'CARAGUATAY'
              'CARAPEGU'#193
              'CARAYA'#211
              'CARMEN DEL PARAN'#193
              'CATUET'#201
              'CERRITO'
              'CHOR'#201
              'CIUDAD DEL ESTE'
              'CONCEPCI'#211'N'
              'CORONEL FRANCISCO MART'#205'NEZ'
              'CORONEL JOS'#201' ANTONIO MACIEL'
              'CORONEL JOS'#201' F'#201'LIX BOGADO'
              'CORONEL OVIEDO'
              'CORPUS CHRISTI'
              'DESMOCHADOS'
              'DOCTOR BOTRELL'
              'DOCTOR CECILIO B'#193'EZ'
              'DOCTOR JUAN MANUEL FRUTOS'
              'DOCTOR J. EULOGIO ESTIGARRIBIA'
              'DOCTOR J. AUGUSTO SALD'#205'VAR'
              'DOCTOR JUAN LE'#211'N MALLORQU'#205'N'
              'DOCTOR MOIS'#201'S BERTONI'
              'DOMINGO MART'#205'NEZ DE IRALA'
              'EDELIRA'
              'EMBOSCADA'
              'ENCARNACI'#211'N'
              'EUSEBIO AYALA'
              'F'#201'LIX P'#201'REZ CARDOZO'
              'FERNANDO DE LA MORA'
              'FILADELFIA'
              'FRAM'
              'FUERTE OLIMPO'
              'GENERAL BERNARDINO CABALLERO'
              'GENERAL EUGENIO A. GARAY'
              'GENERAL ELIZARDO AQUINO'
              'GENERAL FRANCISCO CABALLERO ALVAREZ'
              'GENERAL JOS'#201' EDUVIGIS D'#205'AZ'
              'GENERAL FRANCISCO RESQU'#205'N'
              'GENERAL HIGINIO MOR'#205'NIGO'
              'GENERAL JOS'#201' GERVASIO ARTIGAS'
              'GENERAL JOS'#201' MAR'#205'A DELGADO'
              'GENERAL PATRICIO ESCOBAR'
              'GUARAMBAR'#201
              'GUAYAYB'#205
              'GUAZUCU'#193
              'HERNANDARIAS'
              'HOHENAU'
              'HORQUETA'
              'HUMAIT'#193
              'INDEPENDENCIA NACIONAL'
              'IRU'#209'A'
              'IT'#193
              'ITANAR'#193
              'ITACURUB'#205' DEL ROSARIO'
              'ITAUGU'#193
              'ITAP'#201
              'ITAP'#218'A POTY'
              'ITAQUYRY'
              'ITURBE'
              'ISLA PUC'#218
              'ISLA UMB'#218
              'ITACURUB'#205' DE LA CORDILLERA'
              'JUAN DE MENA'
              'JUAN EMILIANO O'#8217'LEARY'
              'JES'#218'S'
              'JOS'#201' DOMINGO OCAMPOS'
              'JOS'#201' FASSARDI'
              'JOS'#201' LEANDRO OVIEDO'
              'JUAN E AYOLAS'
              'LA COLMENA'
              'LA PASTORA'
              'LA PAZ'
              'LA PALOMA'
              'LAMBAR'#201
              'LAURELES'
              'LIMA'
              'LIMPIO'
              'LORETO'
              'LOS CEDRALES'
              'LOMA GRANDE'
              'LOMA PLATA'
              'LUQUE'
              'MAYOR JULIO D. OTA'#209'O'
              'MAYOR JOS'#201' D. MART'#205'NEZ'
              'MARIANO ROQUE ALONSO'
              'MARISCAL FRANCISCO SOLANO L'#211'PEZ'
              'MARISCAL JOS'#201' F'#201'LIX ESTIGARRIBIA'
              'MBARACAY'#218
              'MBOCAYATY DEL YHAGUY'
              'MBOCAYATY DEL GUAIR'#193
              'MBUYAPEY'
              'MINGA GUAZ'#218
              'MINGA POR'#193
              'NANAWA'
              'NARANJAL'
              'NATALICIO TALAVERA'
              'NATALIO'
              'NUEVA ALBORADA'
              'NUEVA COLOMBIA'
              'NUEVA ESPERANZA'
              'NUEVA GERMANIA'
              'NUEVA ITALIA'
              'NUEVA LONDRES'
              #209'ACUNDAY'
              #209'EMBY'
              #209'EEMBUC'#218
              #209'UM'#205
              'OBLIGADO'
              'PARAGUAR'#205
              'PASO DE PATRIA'
              'PASO YOB'#193'I'
              'PILAR'
              'PIRAP'#211
              'PIRAY'#218
              'PIRIBEBUY'
              'PRESIDENTE CARLOS ANTONIO L'#211'PEZ'
              'PRESIDENTE MANUEL FRANCO'
              'PUERTO CASADO'
              'PUERTO JOS'#201' FALC'#211'N'
              'PUERTO PINASCO'
              'QUIINDY'
              'QUYQUYH'#211
              'REPATRIACI'#211'N'
              'R.I.3 CORRALES'
              'SALTO DEL GUAIR'#193
              'SAN ANTONIO'
              'SAN BERNARDINO'
              'SAN COSME Y SAN DAMI'#193'N'
              'SAN CRIST'#211'BAL'
              'SAN ESTANISLAO'
              'SAN IGNACIO'
              'SAN JOS'#201' OBRERO'
              'SAN JOAQU'#205'N'
              'SAN JOS'#201' DE LOS ARROYOS'
              'SAN JUAN BAUTISTA'
              'SAN JUAN DEL PARAN'#193
              'SAN JUAN NEPOMUCENO'
              'SAN MIGUEL'
              'SAN L'#193'ZARO'
              'SAN LORENZO'
              'SAN PABLO'
              'SAN PATRICIO'
              'SAN PEDRO DE YCUAMANDYY'#218
              'SAN PEDRO DEL PARAN'#193
              'SAN RAFAEL DEL PARAN'#193
              'SAN ROQUE GONZ'#193'LEZ DE SANTA CRUZ'
              'SAN SALVADOR'
              'SANTA ELENA'
              'SANTA FE DEL PARAN'#193
              'SANTA MAR'#205'A'
              'SANTA RITA'
              'SANTA ROSA'
              'SANTA ROSA DEL AGUARAY'
              'SANTA ROSA DEL MBUTUY'
              'SANTA ROSA DEL MONDAY'
              'SANTIAGO'
              'SANT'#205'SIMA TRINIDAD'
              'SAPUC'#193'I'
              'TAVA'#8217'I'
              'TACUAT'#205
              'TACUARAS'
              'TEBICUARYM'#205
              'TENIENTE IRALA FERN'#193'NDEZ'
              'TOBAT'#205
              'UNI'#211'N'
              'VALENZUELA'
              'VAQUER'#205'A'
              'VILLALB'#205'N'
              'VILLA CURUGUATY'
              'VILLA ELISA'
              'VILLA FRANCA'
              'VILLA FLORIDA'
              'VILLA HAYES'
              'VILLA DEL ROSARIO'
              'VILLA OLIVA'
              'VILLA YGATIM'#205
              'VILLARRICA'
              'VILLETA'
              'YABEBYRY'
              'YAGUAR'#211'N'
              'YATYTAY'
              'YATAITY DEL NORTE'
              'YATAITY DEL GUAIR'#193
              'YASYCA'#209'Y'
              'YH'#218
              'YGUAZ'#218
              'YBYCU'#205
              'YBY YA'#218
              'YBYTYM'#205
              'YRYBUCU'#193
              'YPAN'#201
              'YPEH'#218
              'YUTY'
              '25 DE DICIEMBRE'
              '10 DE MARZO'
              '3 DE FEBRERO')
            TabOrder = 14
          end
          object gbxHospedaje: TGroupBox
            Left = 14
            Top = 206
            Width = 612
            Height = 88
            Caption = 'Hospedaje'
            TabOrder = 15
            object lblHabitaciones: TLabel
              Left = 31
              Top = 27
              Width = 143
              Height = 16
              Caption = 'Habitaciones disponibles:*'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -11
              Font.Name = 'Century Gothic'
              Font.Style = []
              ParentFont = False
            end
            object lblPersonasHab: TLabel
              Left = 31
              Top = 59
              Width = 140
              Height = 16
              Caption = 'Personas por habitaci'#243'n:*'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -11
              Font.Name = 'Century Gothic'
              Font.Style = []
              ParentFont = False
            end
            object dbHabitaciones: TDBEdit
              Left = 179
              Top = 24
              Width = 45
              Height = 24
              CharCase = ecUpperCase
              DataField = 'HABITACIONES_DISP'
              DataSource = dsPresupuestos
              MaxLength = 100
              TabOrder = 0
              OnKeyPress = dbHabitacionesKeyPress
            end
            object rgDesayuno: TDBRadioGroup
              Left = 245
              Top = 16
              Width = 95
              Height = 61
              Caption = 'Inc. Desayuno'
              DataField = 'INCLUYE_DESAYUNO'
              DataSource = dsPresupuestos
              Items.Strings = (
                'Si'
                'No')
              ParentBackground = True
              TabOrder = 2
              Values.Strings = (
                'S'
                'N')
            end
            object rgAlmuerzo: TDBRadioGroup
              Left = 365
              Top = 16
              Width = 95
              Height = 61
              Caption = 'Inc. Almuerzo'
              DataField = 'INCLUYE_ALMUERZO'
              DataSource = dsPresupuestos
              Items.Strings = (
                'Si'
                'No')
              ParentBackground = True
              TabOrder = 3
              Values.Strings = (
                'S'
                'N')
            end
            object rgCena: TDBRadioGroup
              Left = 485
              Top = 16
              Width = 95
              Height = 61
              Caption = 'Inc. Cena'
              DataField = 'INCLUYE_CENA'
              DataSource = dsPresupuestos
              Items.Strings = (
                'Si'
                'No')
              ParentBackground = True
              TabOrder = 4
              Values.Strings = (
                'S'
                'N')
            end
            object dbPersonasHab: TDBEdit
              Left = 179
              Top = 56
              Width = 45
              Height = 24
              CharCase = ecUpperCase
              DataField = 'PERSONAS_HABITACION'
              DataSource = dsPresupuestos
              MaxLength = 100
              TabOrder = 1
              OnKeyPress = dbPersonasHabKeyPress
            end
          end
        end
        object btnGuardar: TBitBtn
          Left = 263
          Top = 399
          Width = 105
          Height = 33
          Caption = '&Guardar'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Glyph.Data = {
            F6060000424DF606000000000000360000002800000018000000180000000100
            180000000000C0060000120B0000120B00000000000000000000FF00FFFF00FF
            995951883838823435843535812E2F8C5859A4A5A5A5A3A3A6A4A4A7A5A4A7A4
            A4A6A4A4A5A3A3A4A3A3A5A5A58E5656802D2D813132813233823435823435FF
            00FFFF00FFA0675BB25350BA4949BA4949BC4A4AA43D3D824E4F9C9D9DBFBFBC
            DDDAD8EEEAE7F7F2EEF7F2EDE9E5E3DAD9D7D4D5D5A35B5B7D1818801F1F8723
            23B04141AF4546823334FF00FFA0675BB25350BF4A4ABF4B4BC04C4CA73E3F83
            51518A7474A16766C19A97D5BDBBF7F2EDFFFBF7FAF4F2EAE7E5E1E2E1A65B5C
            7B1716801E1E872323B14141B14747823334FF00FFA0675BB25350BD4A4ABC4B
            4BC04C4CA53E3E8756568A6364872625A05553BA8986E6E1DDFAF4F2FEF8F4F7
            F2EEEBEBEAA95E5D7B1717801E1E872323B14141B14747823334FF00FFA0675B
            B25350BD4A4ABC4B4BC04C4CA53E3E8B5959916A6A7F1B1B882828A15A58D4CC
            CBEEEAE7FAF4F2FEFAF6F8F8F4AC62627B1617801E1E872323B14141B1474782
            3334FF00FFA0675BB25350BD4A4ABC4B4BC04C4CA53E3E8F5B5B986F6E801D1D
            7F1B1B892F2FBAB1B0DDDAD8EFEBE7FCF7F3FFFFFCB165647A1616801E1E8723
            23B14141B14747823334FF00FFA0675BB25350BD4A4ABC4B4BC04C4CA43D3D96
            5F5EA173727F18187F18187F1D1D989090C1C1C0DEDAD7F3EFEBFFFFFCB46866
            7A1616801E1E872323B14141B14747823334FF00FFA0675BB25350BD4A4ABC4B
            4BC04C4CA13C3C996260B59592904A4A8A4545864949878888A0A6A5C6CAC7E6
            EAE6FFFFFFB268677714147D1C1C842121B04141B14747823334FF00FFA0675B
            B25350BD4A4ABC4B4BC04C4CAB4141A65657C6918FBA8989AD8181A57B7B9D74
            749D7474B28887CC9E9DDEB1AFB55C5B912828952D2D993030B64545B1464782
            3334FF00FFA0675BB25350BF4B4BBF4B4BBF4B4BBD4A4ABD4848BC4646BC4747
            BC4747BD4647BD4647BC4646BB4444BB4444BA4444BC4747BD4A4ABD4848BF4B
            4BC04C4CAF4546823334FF00FFA0675BB25350B64545B04241B44846B85150BC
            5757BF5C5BBF5C5BBF5C5BBF5C5BBF5C5BBF5C5BBF5C5BBF5C5BBF5C5BBF5C5B
            BF5C5BBF5E5DBF5454BF4B4BAF4546823334FF00FFA0685BB454519C35318F30
            2CA1514DB47673C29693CBAAA9CCADACCCACABCCACABCCACABCCACABCCACABCC
            ACABCCACABCCACABCCACABCCB2B1C47777BD4646AF4546823334FF00FFA0685B
            B45350972D29C08782F8F2EFF3E7E6F4EAE9F6EDEBF6EDEBF6EDEBF6EDEBF6ED
            EBF6EDEBF6EDEBF6EDEBF6EDEBF6EDEBF8EFEEE9DDDCBF7574B23F3FAF454682
            3435FF00FFA0685BB45350972D29C5908CFFFFFFFAF2F0FAF2F0FAF2F0FAF2F0
            FAF2F0FAF2F0FAF2F0FAF2F0FAF2F0FAF2F0FAF2F0FAF2F0FCF4F3EAE0DEBD74
            73B03D3DAF4546823435FF00FFA0685BB45350972D29C48E8AFFFFFCF6EEEDF6
            EDEBF6EEEDF6EEEDF6EEEDF6EEEDF6EEEDF6EEEDF6EEEDF6EEEDF6EEEDF6EDEB
            FAF2F0EADEDDBD7473B03D3DAF4546823435FF00FFA0685BB45350972D29C48E
            8AFFFFFEE2DCDABDBBBBBFBDBDBFBDBDBFBDBDBFBDBDBFBDBDBFBDBDBFBDBDBF
            BDBDBFBDBDBBBAB8DED9D9EEE1E0BD7473B03D3DAF4546823435FF00FFA0685B
            B45350972D29C48E8AFFFFFEF2E9E9E7E1E0E7E1E0E7E1E0E7E1E0E7E1E0E7E1
            E0E7E1E0E7E1E0E7E1E0E7E1E0E6E0DEF2EBEBEDE0DEBD7473B03D3DAF454682
            3435FF00FFA0685BB45350972D29C48E8AFFFFFEE6E0DEC7C4C4C9C5C5C9C5C5
            C9C5C5C9C5C5C9C5C5C9C5C5C9C5C5C9C5C5C9C5C5C5C2C2E2DDDDEDE1E0BD74
            73B03D3DAF4546823435FF00FFA0685BB45350972D29C48E8AFFFFFEEEE6E5DD
            D7D5DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DCD5D5
            EEE7E6EDE0DEBD7473B03D3DAF4546823435FF00FFA0685BB45350972D29C48E
            8AFFFFFEEEE6E5DDD7D5DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DD
            D8D7DDD8D7DCD5D5EEE7E6EDE0DEBD7473B03D3DAF4546823435FF00FFA0685B
            B45350972D29C48E8AFFFFFEE5DDDDC5C1C1C6C4C2C6C4C2C6C4C2C6C4C2C6C4
            C2C6C4C2C6C4C2C6C4C2C6C4C2C2C0C0E2DCDAEEE1E0BD7473B03D3DAF454682
            3435FF00FFA0685BB45350972D29C58F8BFFFFFFFBF2F0FCF3F2FCF3F2FCF3F2
            FCF3F2FCF3F2FCF3F2FCF3F2FCF3F2FCF3F2FCF3F2FCF3F2FFF6F4EDE0DEBD74
            73B23F3FB04647823435FF00FFA0685BAD5450952D29BC8783EFEFEEEAE2E1EA
            E2E1EAE2E1EAE2E1EAE2E1EAE2E1EAE2E1EAE2E1EAE2E1EAE2E1EAE2E1EAE2E1
            EBE6E5E1D7D5B87270A53939A54142823435FF00FFFF00FF9858518A2D28A36F
            6DB6BCBCB4B2B2B4B2B2B4B2B2B4B2B2B4B2B2B4B2B2B4B2B2B4B2B2B4B2B2B4
            B2B2B4B2B2B4B2B2B2B2B2C1BAB8A56A6A7E2C2D823334FF00FF}
          ParentFont = False
          TabOrder = 1
          OnClick = btnGuardarClick
        end
        object btnCancelar: TBitBtn
          Left = 390
          Top = 399
          Width = 105
          Height = 33
          Caption = '&Cancelar'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Century Gothic'
          Font.Style = []
          Glyph.Data = {
            76060000424D7606000000000000360400002800000018000000180000000100
            08000000000040020000220B0000220B00000001000000010000942900009C31
            00009C390000A5390000A5420000AD420000AD4A0000B54A0000B5520000BD52
            0000BD5A0000C65A0000C6630000CE630000CE6B0000D66B0000D67300009C39
            0800A5390800A5420800AD420800AD4A0800B5520800BD5A0800CE630800AD4A
            1000B5521000B55A1000BD5A1000C6631000DE7B1000BD5A1800BD631800C663
            1800CE731800D6731800DE7B1800DE841800C6632100C66B2100D67B2100DE84
            2100EF942100D6842900E78C2900EF942900DE8C3100EF943100F79C3100F7A5
            3100E7943900F7A53900FFA53900F7A54200FFAD4200FFB54200F7AD4A00FFAD
            4A00FFB54A00FFB55200FFBD5200FFC65200FF00FF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF003E3E3E3E3E3E
            3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E
            1313133E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E13080A13113E3E3E3E
            3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E120A0F0A13133E3E3E3E3E3E3E3E3E3E3E
            3E3E3E3E3E3E3E13130B0F0A13133E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E
            11130C0E0811113E3E3E131111111111111111111111133E3E11150D0E151111
            3E3E131B1B16151515151515071513133E3E11150E0C13113E3E192F2C1E0E0E
            0E0E0E0E0E0F16113E3E3E11160E0A11113E1935332C25180808080808161313
            3E3E3E3E110A0E15113E193839322F24131111111111133E3E3E3E3E11150E0A
            111119353B272E302313113E3E3E3E3E3E3E3E3E3E130D0C131119353C1F1935
            332212113E3E3E3E3E3E3E3E3E130C0C131119353C20002038332213113E3E3E
            3E3E3E3E3E130C0C131119353B2002022739332813113E3E3E3E3E3E11150E0C
            131119353B20023E022638362915113E3E3E3E13110A0E0A113E19353B20023E
            3E011F35362C1A1111111111080E0E14113E19353B20023E3E3E021932363022
            1B15150A0E0E16113E3E19383C20023E3E3E3E02112732302D1E100E0B15113E
            3E3E132B3219113E3E3E3E3E1102131B2120161313113E3E3E3E3E1111113E3E
            3E3E3E3E3E3E1111111111113E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E
            3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E
            3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E}
          ParentFont = False
          TabOrder = 2
          OnClick = btnCancelarClick
        end
      end
    end
  end
  object qryNombreProveedor: TUniQuery
    Connection = DMTuristik.DBTuristik
    SQL.Strings = (
      'select p.id_proveedor, p.nro_documento, p.denominacion'
      'from proveedores p'
      'where p.id_proveedor = 0')
    Left = 456
    Top = 56
    object qryNombreProveedorID_PROVEEDOR: TIntegerField
      FieldName = 'ID_PROVEEDOR'
      Required = True
    end
    object qryNombreProveedorDENOMINACION: TStringField
      FieldName = 'DENOMINACION'
      Size = 40
    end
    object qryNombreProveedorNRO_DOCUMENTO: TStringField
      FieldName = 'NRO_DOCUMENTO'
      Size = 10
    end
  end
  object qryNombreServicio: TUniQuery
    Connection = DMTuristik.DBTuristik
    SQL.Strings = (
      'select s.id_servicio, s.descripcion'
      'from servicio s'
      'where s.id_servicio = 0')
    Left = 456
    Top = 120
    object qryNombreServicioID_SERVICIO: TIntegerField
      FieldName = 'ID_SERVICIO'
    end
    object qryNombreServicioDESCRIPCION: TStringField
      FieldName = 'DESCRIPCION'
      Size = 255
    end
  end
  object qryNombreCategoria: TUniQuery
    Connection = DMTuristik.DBTuristik
    SQL.Strings = (
      'select c.id_categoria, c.nombre_categoria'
      'from categoria c'
      'where c.id_categoria = 0')
    Left = 456
    Top = 147
    object qryNombreCategoriaID_CATEGORIA: TIntegerField
      FieldName = 'ID_CATEGORIA'
    end
    object qryNombreCategoriaNOMBRE_CATEGORIA: TStringField
      FieldName = 'NOMBRE_CATEGORIA'
      Size = 100
    end
  end
  object qryNombreCampanha: TUniQuery
    Connection = DMTuristik.DBTuristik
    SQL.Strings = (
      'select c.id_campanha, c.nombre_campanha'
      'from campanha c'
      'where c.id_campanha = 0'
      'order by c.nombre_campanha')
    Left = 456
    Top = 88
    object qryNombreCampanhaID_CAMPANHA: TIntegerField
      FieldName = 'ID_CAMPANHA'
    end
    object qryNombreCampanhaNOMBRE_CAMPANHA: TStringField
      FieldName = 'NOMBRE_CAMPANHA'
      Size = 100
    end
  end
  object qryPresupuestos: TUniQuery
    SQLInsert.Strings = (
      'INSERT INTO PRESUPUESTO_PROVEEDORES'
      
        '  (ID_CAMPANHA, ID_CATEGORIA, ID_SERVICIO, ID_PROVEEDORES, HABIT' +
        'ACIONES_DISP, PERSONAS_HABITACION, FECHA_EMISION, FECHA_VENCIMIE' +
        'NTO, COSTO, IVA, CIUDAD, ESTADO_REGISTRO, INCLUYE_DESAYUNO, INCL' +
        'UYE_ALMUERZO, INCLUYE_CENA, MODO, OPERADOR)'
      'VALUES'
      
        '  (:ID_CAMPANHA, :ID_CATEGORIA, :ID_SERVICIO, :ID_PROVEEDORES, :' +
        'HABITACIONES_DISP, :PERSONAS_HABITACION, :FECHA_EMISION, :FECHA_' +
        'VENCIMIENTO, :COSTO, :IVA, :CIUDAD, :ESTADO_REGISTRO, :INCLUYE_D' +
        'ESAYUNO, :INCLUYE_ALMUERZO, :INCLUYE_CENA, :MODO, :OPERADOR)')
    SQLDelete.Strings = (
      'DELETE FROM PRESUPUESTO_PROVEEDORES'
      'WHERE'
      '  ID_PRESUPUESTO = :Old_ID_PRESUPUESTO')
    SQLUpdate.Strings = (
      'UPDATE PRESUPUESTO_PROVEEDORES'
      'SET'
      
        '  ID_CAMPANHA = :ID_CAMPANHA, ID_CATEGORIA = :ID_CATEGORIA, ID_S' +
        'ERVICIO = :ID_SERVICIO, ID_PROVEEDORES = :ID_PROVEEDORES, HABITA' +
        'CIONES_DISP = :HABITACIONES_DISP, PERSONAS_HABITACION = :PERSONA' +
        'S_HABITACION, FECHA_EMISION = :FECHA_EMISION, FECHA_VENCIMIENTO ' +
        '= :FECHA_VENCIMIENTO, COSTO = :COSTO, IVA = :IVA, CIUDAD = :CIUD' +
        'AD, ESTADO_REGISTRO = :ESTADO_REGISTRO, INCLUYE_DESAYUNO = :INCL' +
        'UYE_DESAYUNO, INCLUYE_ALMUERZO = :INCLUYE_ALMUERZO, INCLUYE_CENA' +
        ' = :INCLUYE_CENA, MODO = :MODO, OPERADOR = :OPERADOR'
      'WHERE'
      '  ID_PRESUPUESTO = :Old_ID_PRESUPUESTO')
    SQLLock.Strings = (
      'SELECT NULL FROM PRESUPUESTO_PROVEEDORES'
      'WHERE'
      'ID_PRESUPUESTO = :Old_ID_PRESUPUESTO'
      'FOR UPDATE WITH LOCK')
    SQLRefresh.Strings = (
      
        'SELECT ID_CAMPANHA, ID_CATEGORIA, ID_SERVICIO, ID_PROVEEDORES, H' +
        'ABITACIONES_DISP, PERSONAS_HABITACION, FECHA_EMISION, FECHA_VENC' +
        'IMIENTO, COSTO, IVA, CIUDAD, ESTADO_REGISTRO, INCLUYE_DESAYUNO, ' +
        'INCLUYE_ALMUERZO, INCLUYE_CENA, MODO, OPERADOR FROM PRESUPUESTO_' +
        'PROVEEDORES'
      'WHERE'
      '  ID_PRESUPUESTO = :Old_ID_PRESUPUESTO')
    Connection = DMTuristik.DBTuristik
    SQL.Strings = (
      
        'select p.*, pro.denominacion as desc_proveedor, c.nombre_campanh' +
        'a, ca.nombre_categoria, s.descripcion as desc_servicio'
      'from presupuesto_proveedores p'
      
        'inner join proveedores pro on p.id_proveedores = pro.id_proveedo' +
        'r and pro.estado_registro = '#39'A'#39
      
        'inner join campanha c on p.id_campanha = c.id_campanha and c.est' +
        'ado_registro = '#39'A'#39
      
        'inner join categoria ca on p.id_categoria = ca.id_categoria and ' +
        'ca.estado_registro = '#39'A'#39
      
        'inner join servicio s on p.id_servicio = s.id_servicio and s.est' +
        'ado_registro = '#39'A'#39
      'where p.id_presupuesto = 0'
      'order by p.id_campanha')
    CachedUpdates = True
    Left = 592
    Top = 136
    object qryPresupuestosID_PRESUPUESTO: TIntegerField
      FieldName = 'ID_PRESUPUESTO'
    end
    object qryPresupuestosID_CAMPANHA: TIntegerField
      FieldName = 'ID_CAMPANHA'
    end
    object qryPresupuestosID_CATEGORIA: TIntegerField
      FieldName = 'ID_CATEGORIA'
    end
    object qryPresupuestosID_SERVICIO: TIntegerField
      FieldName = 'ID_SERVICIO'
    end
    object qryPresupuestosID_PROVEEDORES: TIntegerField
      FieldName = 'ID_PROVEEDORES'
    end
    object qryPresupuestosHABITACIONES_DISP: TIntegerField
      FieldName = 'HABITACIONES_DISP'
    end
    object qryPresupuestosPERSONAS_HABITACION: TIntegerField
      FieldName = 'PERSONAS_HABITACION'
    end
    object qryPresupuestosFECHA_EMISION: TDateField
      FieldName = 'FECHA_EMISION'
    end
    object qryPresupuestosFECHA_VENCIMIENTO: TDateField
      FieldName = 'FECHA_VENCIMIENTO'
    end
    object qryPresupuestosCOSTO: TFloatField
      FieldName = 'COSTO'
      DisplayFormat = '###.###.###.###.###,##'
      EditFormat = '###.###.###.###.###,##'
    end
    object qryPresupuestosIVA: TSmallintField
      FieldName = 'IVA'
    end
    object qryPresupuestosCIUDAD: TStringField
      FieldName = 'CIUDAD'
      Size = 50
    end
    object qryPresupuestosESTADO_REGISTRO: TStringField
      FieldName = 'ESTADO_REGISTRO'
      Size = 1
    end
    object qryPresupuestosINCLUYE_DESAYUNO: TStringField
      FieldName = 'INCLUYE_DESAYUNO'
      FixedChar = True
      Size = 1
    end
    object qryPresupuestosINCLUYE_ALMUERZO: TStringField
      FieldName = 'INCLUYE_ALMUERZO'
      FixedChar = True
      Size = 1
    end
    object qryPresupuestosINCLUYE_CENA: TStringField
      FieldName = 'INCLUYE_CENA'
      FixedChar = True
      Size = 1
    end
    object qryPresupuestosMODO: TStringField
      FieldName = 'MODO'
      Size = 1
    end
    object qryPresupuestosOPERADOR: TStringField
      FieldName = 'OPERADOR'
      Size = 10
    end
    object qryPresupuestosFECHA_CARGA: TDateField
      FieldName = 'FECHA_CARGA'
    end
    object qryPresupuestosDESC_PROVEEDOR: TStringField
      FieldName = 'DESC_PROVEEDOR'
      Size = 40
    end
    object qryPresupuestosNOMBRE_CAMPANHA: TStringField
      FieldName = 'NOMBRE_CAMPANHA'
      Size = 100
    end
    object qryPresupuestosNOMBRE_CATEGORIA: TStringField
      FieldName = 'NOMBRE_CATEGORIA'
      Size = 100
    end
    object qryPresupuestosDESC_SERVICIO: TStringField
      FieldName = 'DESC_SERVICIO'
      Size = 255
    end
  end
  object dsPresupuestos: TUniDataSource
    DataSet = qryPresupuestos
    Left = 664
    Top = 136
  end
  object qryControlaPaquete: TUniQuery
    Connection = DMTuristik.DBTuristik
    SQL.Strings = (
      'select p.id_presupuesto_proveedor'
      'from paquete_proveedores p'
      
        'where p.estado_registro = '#39'A'#39' and p.id_presupuesto_proveedor = :' +
        'id_presupuesto')
    Left = 552
    Top = 224
    ParamData = <
      item
        DataType = ftInteger
        Name = 'id_presupuesto'
      end>
    object qryControlaPaqueteID_PRESUPUESTO_PROVEEDOR: TIntegerField
      FieldName = 'ID_PRESUPUESTO_PROVEEDOR'
    end
  end
end
